home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-02 / fgl110c.zip / 08-05.C < prev    next >
Text File  |  1992-01-31  |  899b  |  46 lines
  1. #include <fastgraf.h>
  2. #include <stdio.h>
  3. #include <stdlib.h>
  4.  
  5. void main(void);
  6.  
  7. #define PAGES 4
  8.  
  9. void main()
  10. {
  11.    int old_mode, new_mode;
  12.    int page;
  13.    char string[8];
  14.  
  15.    new_mode = fg_bestmode(80,25,PAGES);
  16.    if (new_mode < 0) {
  17.       printf("This program requires ");
  18.       printf("an 80-column display.\n");
  19.       exit(1);
  20.       }
  21.  
  22.    old_mode = fg_getmode();
  23.    fg_setmode(new_mode);
  24.    fg_cursor(0);
  25.  
  26.    for (page = 0; page < PAGES; page++) {
  27.       fg_allocate(page);
  28.       fg_setpage(page);
  29.       fg_setcolor(7);
  30.       fg_rect(0,fg_getmaxx(),0,fg_getmaxy());
  31.       fg_setattr(0,7,0);
  32.       fg_locate(12,37);
  33.       sprintf(string,"page %d",page);
  34.       fg_text(string,6);
  35.       }
  36.  
  37.    for (page = 0; page < PAGES; page++) {
  38.       fg_setvpage(page);
  39.       fg_waitkey();
  40.       fg_freepage(page);
  41.       }
  42.  
  43.    fg_setmode(old_mode);
  44.    fg_reset();
  45. }
  46.